MacWorld 1998 June/Macworld (1998-06).dmg/Shareware World/Utilities/Video/MVEMVC/MyVidEditor 2.1/Scripts Folder/Process all Projects Script

Text File | 1998-02-12 | 635b | 22 lines

on open (theItems)
    tell application "MyVidEditor©"
        activate
    end tell
    set isokay to true
    if isokay then
        script processProjectinfolder
            on open (theFile)
                set SourceName to theFile as string
                copy (SourceName & ".cin") to OutName
                with timeout of 100000 seconds
                    -- this "timeout of 100000" prevents a timeout error being generated
                    tell application "MyVidEditor©"
                        set isokay to Compress project file SourceName to movie file OutName as self contained yes
                    end tell
                end timeout
            end open
        end script
        walk folders theItems with script processProjectinfolder with using files
    end if
end open